home *** CD-ROM | disk | FTP | other *** search
Text File | 1998-06-24 | 36.1 KB | 1,284 lines |
- #LIBRARIES_TRITON_H=-1
- ;**
- ;** $VER: triton.h 4.39 (24.6.95) - triton.bb2
- ;** Triton Release 1.3
- ;**
- ;** triton.library definitions
- ;**
- ;** (C) Copyright 1993-1994 Stefan Zeiger
- ;** All Rights Reserved
- ;** conversion to BlitzBasic2 by Philipp Lonke and Rupert Henson
- ;** Blitz2-Triton-Support and Infos ask phips@scout.franken.de
- ;** or ask in the blitz mailing list. ** READ THE DOCUMENTATION! **
- ;**
-
- ; NOTE: One line of a macro cannot exceed 128 chars
- ; (just use extra macros - see LK1 - List Kludge 1 etc.)
-
- Macro TRITONNAME
- "triton.library"
- End Macro
-
- #TRITON10VERSION=1
- #TRITON11VERSION=2
- #TRITON12VERSION=3
-
- #INTUI_V36_NAMES_ONLY=-1
-
- ; this here is an addition to the amigalibs.res where this
- ; newtype is not defined
-
- NEWTYPE .AppWindow
- *aw_PRIVATE.b
- End NEWTYPE
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* //////////////////////////////////////////////////////////// Macros // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- Macro EndProject
- #TAG_END,0
- End Macro
-
- Macro WindowTitle
- #TRWI_Title,`1
- End Macro
-
- Macro ScreenTitle
- #TRWI_ScreenTitle,`1
- End Macro
-
- Macro WindowID
- #TRWI_ID,`1
- End Macro
-
- Macro WindowFlags
- #TRWI_Flags,`1
- End Macro
-
- Macro WindowPosition
- #TRWI_Position,`1
- End Macro
-
- Macro WindowUnderscore
- #TRWI_Underscore,`1
- End Macro
-
- Macro WindowDimensions
- #TRWI_Dimensions,`1
- End Macro
-
- Macro WindowBackfillWin
- #TRWI_Backfill,#TRBF_WINDOWBACK
- End Macro
-
- Macro WindowBackfillReq
- #TRWI_Backfill,#TRBF_REQUESTERBACK
- End Macro
-
- Macro WindowBackfillNone
- #TRWI_Backfill,#TRBF_NONE
- End Macro
-
- Macro WindowBackfillS
- #TRWI_Backfill,#TRBF_SHINE
- End Macro
-
- Macro WindowBackfillSA
- #TRWI_Backfill,#TRBF_SHINE_SHADOW
- End Macro
-
- Macro WindowBackfillSF
- #TRWI_Backfill,#TRBF_SHINE_FILL
- End Macro
-
- Macro WindowBackfillSB
- #TRWI_Backfill,#TRBF_SHINE_BACKGROUND
- End Macro
-
- Macro WindowBackfillA
- #TRWI_Backfill,#TRBF_SHADOW
- End Macro
-
- Macro WindowBackfillAF
- #TRWI_Backfill,#TRBF_SHADOW_FILL
- End Macro
-
- Macro WindowBackfillAB
- #TRWI_Backfill,#TRBF_SHADOW_BACKGROUND
- End Macro
-
- Macro WindowBackfillF
- #TRWI_Backfill,#TRBF_FILL
- End Macro
-
- Macro WindowBackfillFB
- #TRWI_Backfill,#TRBF_FILL_BACKGROUND
- End Macro
-
- Macro CustomScreen
- #TRWI_CustomScreen,`1
- End Macro
-
- Macro PubScreen
- #TRWI_PubScreen,`1
- End Macro
-
- Macro PubScreenName
- #TRWI_PubScreenName,`1
- End Macro
-
- ;V4 entry QuickHelp
-
- Macro QuickHelpOn
- #TRWI_QuickHelp,`1
- End Macro
-
-
- ;/* Menus */
- Macro BeginMenu
- #TRMN_Title,`1
- End Macro
-
- Macro MenuFlags
- #TRMN_Flags,`1
- End Macro
-
- Macro _MenuItem
- #TRMN_Item,`1,#TRAT_ID,`2
- End Macro
-
- Macro MenuItemC
- #TRMN_Item,`1,#TRMN_Flags,#TRMF_CHECKIT,#TRAT_ID,`2
- End Macro
-
- Macro MenuItemCC
- #TRMN_Item,`1,#TRMN_Flags,#TRMF_CHECKED,#TRAT_ID,`2
- End Macro
-
- Macro BeginSub
- #TRMN_Item,`1
- End Macro
-
- Macro MenuItemD
- #TRMN_Item,`1,!MenuFlags{#TRMF_DISABLED},#TRAT_ID,`2
- End Macro
-
- Macro _SubItem
- #TRMN_Sub,`1,#TRAT_ID,`2
- End Macro
-
- Macro SubItemD
- #TRMN_Sub,`1,!MenuFlags{#TRMF_DISABLED},#TRAT_ID,`2
- End Macro
-
- Macro ItemBarlabel
- #TRMN_Item,#TRMN_BARLABEL
- End Macro
-
- Macro SubBarlabel
- #TRMN_Sub,#TRMN_BARLABEL
- End Macro
-
- ;/* Groups */
- Macro HorizGroup
- #TRGR_Horiz,0
- End Macro
-
- Macro HorizGroupE
- #TRGR_Horiz,#TRGR_EQUALSHARE
- End Macro
-
- Macro HorizGroupS
- #TRGR_Horiz,#TRGR_PROPSPACES
- End Macro
-
- Macro HorizGroupA
- #TRGR_Horiz,#TRGR_ALIGN
- End Macro
-
- Macro HorizGroupEA
- #TRGR_Horiz,#TRGR_EQUALSHARE|#TRGR_ALIGN
- End Macro
-
- Macro HorizGroupSA
- #TRGR_Horiz,#TRGR_PROPSPACES|#TRGR_ALIGN
- End Macro
-
- Macro HorizGroupC
- #TRGR_Horiz,#TRGR_CENTER
- End Macro
-
- Macro HorizGroupEC
- #TRGR_Horiz,#TRGR_EQUALSHARE|#TRGR_CENTER
- End Macro
-
- Macro HorizGroupSC
- #TRGR_Horiz,#TRGR_PROPSPACES|#TRGR_CENTER
- End Macro
-
- Macro HorizGroupAC
- #TRGR_Horiz,#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro HorizGroupEAC
- #TRGR_Horiz,#TRGR_EQUALSHARE|#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro HorizGroupSAC
- #TRGR_Horiz,#TRGR_PROPSPACES|#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro VertGroup
- #TRGR_Vert,0
- End Macro
-
- Macro VertGroupE
- #TRGR_Vert,TRGR_EQUALSHARE
- End Macro
-
- Macro VertGroupS
- #TRGR_Vert,#TRGR_PROPSPACES
- End Macro
-
- Macro VertGroupA
- #TRGR_Vert,#TRGR_ALIGN
- End Macro
-
- Macro VertGroupEA
- #TRGR_Vert,#TRGR_EQUALSHARE|#TRGR_ALIGN
- End Macro
-
- Macro VertGroupSA
- #TRGR_Vert,#TRGR_PROPSPACES|#TRGR_ALIGN
- End Macro
-
- Macro VertGroupC
- #TRGR_Vert,#TRGR_CENTER
- End Macro
-
- Macro VertGroupEC
- #TRGR_Vert,#TRGR_EQUALSHARE|#TRGR_CENTER
- End Macro
-
- Macro VertGroupSC
- #TRGR_Vert,#TRGR_PROPSPACES|#TRGR_CENTER
- End Macro
-
- Macro VertGroupAC
- #TRGR_Vert,#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro VertGroupEAC
- #TRGR_Vert,#TRGR_EQUALSHARE|#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro VertGroupSAC
- #TRGR_Vert,#TRGR_PROPSPACES|#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro EndGroup
- #TRGR_End,0
- End Macro
-
- Macro ColumnArray
- #TRGR_Horiz,#TRGR_ARRAY|#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro LineArray
- #TRGR_Vert,#TRGR_ARRAY|#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro BeginColumn
- #TRGR_Vert,#TRGR_PROPSHARE|#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro BeginLine
- #TRGR_Horiz,#TRGR_PROPSHARE|#TRGR_ALIGN|#TRGR_CENTER
- End Macro
-
- Macro BeginColumnI
- #TRGR_Vert,#TRGR_PROPSHARE|#TRGR_ALIGN|#TRGR_CENTER|#TRGR_INDEP
- End Macro
-
- Macro BeginLineI
- #TRGR_Horiz,#TRGR_PROPSHARE|#TRGR_ALIGN|#TRGR_CENTER|#TRGR_INDEP
- End Macro
-
- Macro EndColumn
- !EndGroup
- End Macro
-
- Macro EndLine
- !EndGroup
- End Macro
-
- Macro EndArray
- !EndGroup
- End Macro
-
- ;/* Display Object */
- Macro QuickHelp
- #TRDO_QuickHelpString,`1
- End Macro
-
- ;/* Spaces */
- Macro SpaceB
- #TROB_Space,#TRST_BIG
- End Macro
-
- Macro Space
- #TROB_Space,#TRST_NORMAL
- End Macro
-
- Macro SpaceS
- #TROB_Space,#TRST_SMALL
- End Macro
-
- Macro SpaceN
- #TROB_Space,#TRST_NONE
- End Macro
-
- ;/* Text */
- Macro TextN
- #TROB_Text,0,#TRAT_Text,`1
- End Macro
-
- Macro TextH
- #TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_HIGHLIGHT
- End Macro
-
- Macro Text3
- #TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_3D
- End Macro
-
- Macro TextB
- #TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_BOLD
- End Macro
-
- Macro TextT
- #TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_TITLE
- End Macro
-
- Macro TextID
- #TROB_Text,0,#TRAT_Text,`1,#TRAT_ID,`2
- End Macro
-
- Macro TextNR
- !TextN{`1},#TRAT_Flags,#TROF_RIGHTALIGN
- End Macro
-
- Macro ClippedText
- !TextN{`1},#TRAT_Flags,#TRTX_CLIPPED|#TRTX_NOUNDERSCORE
- End Macro
-
- Macro ClippedTextID
- !TextN{`1},#TRAT_Flags,#TRTX_CLIPPED|#TRTX_NOUNDERSCORE,#TRAT_ID,`2
- End Macro
-
- Macro CenteredText
- !HorizGroupSC,!Space,!TextN{`1},!Space,!EndGroup
- End Macro
-
- Macro CenteredTextH
- !HorizGroupSC,!Space,!TextH{`1},!Space,!EndGroup
- End Macro
-
- Macro CenteredText3
- !HorizGroupSC,!Space,!Text3{`1},!Space,!EndGroup
- End Macro
-
- Macro CenteredTextB
- !HorizGroupSC,!Space,!TextB{`1},!Space,!EndGroup
- End Macro
-
- Macro CenteredTextID
- !HorizGroupSC,!Space,!TextID{`1,`2},!Space,!EndGroup
- End Macro
-
- Macro CenteredText_BS
- !HorizGroupSC,!SpaceB,!TextN{`1},!SpaceB,!EndGroup
- End Macro
-
- Macro TBK1 ; TextBox Kludge 1 needed with V4
- !Space,!EndGroup,!SpaceS,!EndGroup
- End Macro
-
- Macro _TextBox
- #TROB_FrameBox,#TRFB_TEXT
- End Macro
-
- Macro TextBox
- !_TextBox,!ObjectBackfillB, !VertGroup, !SpaceS, !HorizGroupSC, !Space, !TextN{`1},#TRAT_ID,`2,#TRAT_MinWidth,`3,!TBK1
- End Macro
-
- Macro ClippedTextBox
- !_TextBox,!ObjectBackfillB,!VertGroupAC,!SpaceS,!HorizGroupAC,!Space,!ClippedTextID{`1,`2},!TBK1
- End Macro
-
- Macro ClippedTextBoxMW
- !_TextBox,!ObjectBackfillB,!VertGroupAC,!SpaceS,!HorizGroupAC,!Space,!ClippedTextID{`1,`2},#TRAT_MinWidth,`3,!TBK1
- End Macro
-
- Macro TextRIGHT
- !HorizGroupS,!Space,!TextN{`1},!ID{`2},!EndGroup
- End Macro
-
- Macro Integer
- #TROB_Text,0,#TRAT_Value,`1
- End Macro
-
- Macro IntegerH
- #TROB_Text,0,#TRAT_Value,`1,#TRAT_Flags,#TRTX_HIGHLIGHT
- End Macro
-
- Macro Integer3
- #TROB_Text,0,#TRAT_Value,`1,#TRAT_Flags,#TRTX_3D
- End Macro
-
- Macro IntegerB
- #TROB_Text,0,#TRAT_Value,`1,#TRAT_Flags,#TRTX_BOLD
- End Macro
-
- Macro CenteredInteger
- !HorizGroupSC,!Space,!Integer{`1},!Space,!EndGroup
- End Macro
-
- Macro CenteredIntegerH
- !HorizGroupSC,!Space,!IntegerH{`1},!Space,!EndGroup
- End Macro
-
- Macro CenteredInteger3
- !HorizGroupSC,!Space,!Integer3{`1},!Space,!EndGroup
- End Macro
-
- Macro CenteredIntegerB
- !HorizGroupSC,!Space,!IntegerB{`1},!Space,!EndGroup
- End Macro
-
- ; Kludge for longer macro in Blitz, Hope this works!
-
- Macro IBK1
- !Space,!EndGroup,!SpaceS,!EndGroup
- End Macro
-
- Macro IntegerBox
- !GroupBox,!ObjectBackfillB,!VertGroup,!SpaceS,!HorizGroupSC,!Space,!Integer{`1},#TRAT_ID,`2,#TRAT_MinWidth,`3,!IBK1
- End Macro
-
- ;/* Buttons */
- Macro Button
- #TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2
- End Macro
-
- Macro ButtonR
- #TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_RETURNOK
- End Macro
-
- Macro ButtonE
- #TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_ESCOK
- End Macro
-
- Macro ButtonRE
- #TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_RETURNOK|#TRBU_ESCOK
- End Macro
-
- Macro CenteredButton
- !HorizGroupSC,!Space,#TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup
- End Macro
-
- Macro CenteredButtonR
- !HorizGroupSC,!Space,#TROB_Button,0,#TRAT_Flags,#TRBU_RETURNOK,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup
- End Macro
-
- Macro CenteredButtonE
- !HorizGroupSC,!Space,#TROB_Button,0,#TRAT_Flags,#TRBU_ESCOK,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup
- End Macro
-
- Macro CenteredButtonRE
- !HorizGroupSC,Space,#TROB_Button,0,#TRAT_Flags,#TRBU_RETURNOK|#TRBU_ESCOK,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup
- End Macro
-
- Macro EmptyButton
- #TROB_Button,0,#TRAT_Text,Null(""),#TRAT_ID,`1
- End Macro
-
- Macro GetFileButton
- #TROB_Button,#TRBT_GETFILE,#TRAT_Text,Null(""),#TRAT_ID,`1,#TRAT_Flags,#TRBU_YRESIZE
- End Macro
-
- Macro GetDrawerButton
- #TROB_Button,#TRBT_GETDRAWER,#TRAT_Text,Null(""),#TRAT_ID,`1,#TRAT_Flags,#TRBU_YRESIZE
- End Macro
-
- Macro GetEntryButton
- #TROB_Button,#TRBT_GETENTRY,#TRAT_Text,Null(""),#TRAT_ID,`1,#TRAT_Flags,#TRBU_YRESIZE
- End Macro
-
- Macro GetFileButtonS
- #TROB_Button,#TRBT_GETFILE,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_YRESIZE
- End Macro
-
- Macro GetDrawerButtonS
- #TROB_Button,#TRBT_GETDRAWER,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_YRESIZE
- End Macro
-
- Macro GetEntryButtonS
- #TROB_Button,#TRBT_GETENTRY,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_YRESIZE
- End Macro
-
- ;/* Lines */
- Macro _Line
- #TROB_Line,`1
- End Macro
-
- Macro HorizSeparator
- !HorizGroupEC,!Space,!_Line{#TROF_HORIZ},!Space,!EndGroup
- End Macro
-
- Macro VertSeparator
- !VertGroupEC,!Space,!_Line{#TROF_VERT},!Space,!EndGroup
- End Macro
-
- Macro NamedSeparator
- !HorizGroupEC,!Space,!_Line{#TROF_HORIZ},!Space,!TextT{`1},!Space,!_Line{#TROF_HORIZ},!Space,!EndGroup
- End Macro
-
- Macro NamedSeparatorI
- !HorizGroupEC,!Space,!_Line{#TROF_HORIZ},!Space,!TextT{`1},#TRAT_ID,`2,!Space,!_Line{#TROF_HORIZ},!Space,!EndGroup
- End Macro
-
- Macro NamedSeparatorN
- !HorizGroupEC,!_Line{#TROF_HORIZ},!Space,!TextT{`1},!Space,!_Line{#TROF_HORIZ},!EndGroup
- End Macro
-
- Macro NamedSeparatorIN
- !HorizGroupEC,!_Line{TROF_HORIZ},!Space,!TextT{`1},#TRAT_ID,`2,!Space,!_Line{#TROF_HORIZ},!EndGroup
- End Macro
-
- ;/* FrameBox */
- Macro GroupBox
- #TROB_FrameBox,#TRFB_GROUPING
- End Macro
-
- Macro NamedFrameBox
- #TROB_FrameBox,#TRFB_FRAMING,#TRAT_Text,`1
- End Macro
-
-
- ;/* DropBox */
- Macro DropBox
- #TROB_DropBox,0,#TRAT_ID,`1
- End Macro
-
- ;/* CheckBox gadget */
- Macro CheckBox
- #TROB_CheckBox,0,#TRAT_ID,`1
- End Macro
-
- Macro CheckBoxC
- #TROB_CheckBox,0,#TRAT_ID,`1,#TRAT_Value,True
- End Macro
-
- Macro CheckBoxLEFT
- !HorizGroupS,!CheckBox{`1},!Space,!EndGroup
- End Macro
-
- Macro CheckBoxCLEFT
- !HorizGroupS,!CheckBoxC{`1},!Space,!EndGroup
- End Macro
-
- ;/* String gadget */
- Macro _StringGadget
- #TROB_String,`1,#TRAT_ID,`2
- End Macro
-
- Macro PasswordGadget
- #TROB_String,`1,#TRAT_ID,`2,#TRAT_Flags,#TRST_INVISIBLE
- End Macro
-
- Macro StringGadgetNR
- #TROB_String,`1,#TRAT_ID,`2,#TRAT_Flags,#TRST_NORETURNBROADCAST
- End Macro
-
- ;/* Cycle gadget */
- Macro CycleGadget
- #TROB_Cycle,`1,#TRAT_ID,`3,#TRAT_Value,`2
- End Macro
-
- Macro MXGadget
- #TROB_Cycle,`1,#TRAT_ID,`3,#TRAT_Value,`2,#TRAT_Flags,#TRCY_MX
- End Macro
-
- Macro MXGadgetR
- #TROB_Cycle,`1,#TRAT_ID,`3,#TRAT_Value,`2,#TRAT_Flags,#TRCY_MX|TRCY_RIGHTLABELS
- End Macro
-
- ;/* Slider gadget */
- Macro SliderGadget
- #TROB_Slider,0,#TRSL_Min,`1,#TRSL_Max,`2,#TRAT_ID,`4,#TRAT_Value,`3
- End Macro
-
- ;/* Palette gadget */
- Macro PaletteGadget
- #TROB_Palette,0,#TRAT_ID,`2,#TRAT_Value,`1
- End Macro
-
- ;/* Listview gadget */
- Macro ListRO
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_READONLY,#TRAT_ID,`2,#TRAT_Value,0,#TRLV_Top,`3
- End Macro
-
- Macro ListSel
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SELECT,#TRAT_ID,`2,#TRAT_Value,0,#TRLV_Top,`3
- End Macro
-
- Macro LK3 ; {top,value} List Kludge 3
- #TRAT_Value,`2,#TRLV_Top,`1
- End Macro
-
- Macro ListSS
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SHOWSELECTED,#TRAT_ID,`2,#TRAT_Value,`4,#TRLV_Top,`3
- End Macro
-
- ; it finally works!
- Macro ListROC
- AddTags #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_READONLY|#TRLV_NOCURSORKEYS
- AddTags #TRAT_ID,`2,#TRAT_Value,`3,#TRLV_Top,`3
- End Macro
-
- Macro ListSelC
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SELECT|#TRLV_NOCURSORKEYS,#TRAT_ID,`2,!LK3{`3,0}
- End Macro
-
- Macro ListSSC
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SHOWSELECTED|#TRLV_NOCURSORKEYS,#TRAT_ID,`2,!LK3{`3,`4}
- End Macro
-
- Macro ListRON
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_READONLY|#TRLV_NONUMPADKEYS,#TRAT_ID,`2,!LK3{`3,0}
- End Macro
-
- Macro ListSelN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SELECT|#TRLV_NONUMPADKEYS,#TRAT_ID,`2,!LK3{`3,0}
- End Macro
-
- Macro ListSSN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SHOWSELECTED|#TRLV_NONUMPADKEYS,#TRAT_ID,`2,!LK3{`3,`4}
- End Macro
-
- Macro LK2 ; {id,top} List Kludge 2
- #TRAT_ID,`1,#TRAT_Value,0,#TRLV_Top,`1
- End Macro
-
- Macro ListROCN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_READONLY|#TRLV_NOCURSORKEYS|#TRLV_NONUMPADKEYS,!LK2{`2,`3}
- End Macro
-
- Macro ListSelCN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SELECT|#TRLV_NOCURSORKEYS|#TRLV_NONUMPADKEYS,!LK2{`2,`3}
- End Macro
-
- Macro LK1 ; (id,top,value) List Kludge 1
- #TRAT_ID,`1,#TRAT_Value,`3,#TRLV_Top,`2
- End Macro
-
- Macro ListSSCN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SHOWSELECTED|#TRLV_NOCURSORKEYS|#TRLV_NONUMPADKEYS,!LK1{`2,`3,`4}
- End Macro
-
- Macro FWListRO
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_READONLY,#TRAT_ID,`2,#TRAT_Value,0,#TRLV_Top,`3
- End Macro
-
- Macro FWListSel
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SELECT,#TRAT_ID,`2,TRAT_Value,0,#TRLV_Top,`3
- End Macro
-
- Macro FWListSS
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SHOWSELECTED,!LK1{`2,`3,`4}
- End Macro
-
- Macro FWListROC
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_READONLY|#TRLV_NOCURSORKEYS,!LK1{`2,0,`3}
- End Macro
-
- Macro FWListSelC
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SELECT|#TRLV_NOCURSORKEYS,!LK1{`2,0,`3}
- End Macro
-
- Macro FWListSSC
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SHOWSELECTED|#TRLV_NOCURSORKEYS,!LK1{`2,`3,`4}
- End Macro
-
- Macro FWListRON
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_READONLY|#TRLV_NONUMPADKEYS,!LK2{`2,`3,0}
- End Macro
-
- Macro FWListSelN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SELECT|#TRLV_NONUMPADKEYS,!LK2{`2,`3,0}
- End Macro
-
- Macro FWListSSN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SHOWSELECTED|#TRLV_NONUMPADKEYS,!LK2{`2,`3,`4}
- End Macro
-
- Macro LK4 ; List Kludge 4 only for a few lines below
- |#TRLV_NOCURSORKEYS|#TRLV_NONUMPADKEYS
- End Macro
-
- Macro FWListROCN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_READONLY !LK4,!LK2{`2,`3,0}
- End Macro
-
- Macro FWListSelCN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SELECT !LK4,!LK2{`2,`3,0}
- End Macro
-
- Macro FWListSSCN
- #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SHOWSELECTED !LK4,!LK2{`2,`3,`4}
- End Macro
-
- ;/* Progress indicator */
- Macro Progress
- #TROB_Progress,`1,#TRAT_ID,`3,#TRAT_Value,`2
- End Macro
-
- ;/* Image */
- Macro BoopsiImage
- #TROB_Image,`1,#TRAT_Flags,#TRIM_BOOPSI
- End Macro
-
- Macro BoopsiImageD
- #TROB_Image,`1,#TRAT_MinWidth,`2,#TRAT_MinHeight,`3,#TRAT_Flags,#TRIM_BOOPSI
- End Macro
-
- ;/* Attributes */
- Macro ID
- #TRAT_ID,`1
- End Macro
-
- Macro Disabled
- #TRAT_Disabled,True
- End Macro
-
- Macro ObjectBackfillWin
- #TRAT_Backfill,#TRBF_WINDOWBACK
- End Macro
-
- Macro ObjectBackfillReq
- #TRAT_Backfill,#TRBF_REQUESTERBACK
- End Macro
-
- Macro ObjectBackfillB
- #TRAT_Backfill,#TRBF_NONE
- End Macro
-
- Macro ObjectBackfillS
- #TRAT_Backfill,#TRBF_SHINE
- End Macro
-
- Macro ObjectBackfillSA
- #TRAT_Backfill,#TRBF_SHINE_SHADOW
- End Macro
-
- Macro ObjectBackfillSF
- #TRAT_Backfill,#TRBF_SHINE_FILL
- End Macro
-
- Macro ObjectBackfillSB
- #TRAT_Backfill,#TRBF_SHINE_BACKGROUND
- End Macro
-
- Macro ObjectBackfillA
- #TRAT_Backfill,#TRBF_SHADOW
- End Macro
-
- Macro ObjectBackfillAF
- #TRAT_Backfill,#TRBF_SHADOW_FILL
- End Macro
-
- Macro ObjectBackfillAB
- #TRAT_Backfill,#TRBF_SHADOW_BACKGROUND
- End Macro
-
- Macro ObjectBackfillF
- #TRAT_Backfill,#TRBF_FILL
- End Macro
-
- Macro ObjectBackfillFB
- #TRAT_Backfill,#TRBF_FILL_BACKGROUND
- End Macro
-
- ;/* Requester support */
- ;Kludge for longer macro (again!)
-
- Macro reqk
- !WindowFlags{#TRWF_NOZIPGADGET|#TRWF_NOSIZEGADGET|#TRWF_NOCLOSEGADGET|#TRWF_NODELZIP|#TRWF_NOESCCLOSE}
- End Macro
-
- Macro BeginRequester
- !WindowTitle{`1},!WindowPosition{`2},!WindowBackfillReq,!reqk,!VertGroupA,!Space,!HorizGroupA,!Space,!GroupBox,!ObjectBackfillB
- End Macro
-
- Macro BeginRequesterGads
- !Space,!EndGroup,!Space
- End Macro
-
- Macro EndRequester
- !Space,!EndGroup,!EndProject
- End Macro
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* /////////////////////////////////////////////////// Support library // */
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;#Application=__Triton_Support_App
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* //////////////////////////////////////////////// The Triton message // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- NEWTYPE .TR_Message
- *trm_Project.TR_Project
- trm_ID.l ;/* The object's ID (where appropriate) */
- trm_Class.l ;/* The Triton message class */
- trm_Data.l ;/* The class-specific data */
- trm_Code.l ;/* Currently only used by TRMS_KEYPRESSED */
- trm_Qualifier.l ;/* IEQUALIFIERs */
- trm_Seconds.l ;/* \ Copy of system clock time (Only where */
- trm_Micros.l ;/* / available! If not set, trm_Seconds is 0L) */
- *trm_App.TR_App
- End NEWTYPE
-
- ;/* Message classes */
-
- #TRMS_CLOSEWINDOW =1 ; The window should be closed */
- #TRMS_ERROR =2 ; An error occured. Error code in trm_Data */
- #TRMS_NEWVALUE =3 ; Object's value has changed. New value in trm_Data */
- #TRMS_ACTION =4 ; Object has triggered an action */
- #TRMS_ICONDROPPED =5 ; Icon dropped over window (ID=0)|DropBox. AppMessage* in trm_Data */
- #TRMS_KEYPRESSED =6 ; Key pressed. trm_Data contains ASCII code, trm_Code raw code and */
- #TRMS_HELP =7 ; The user requested help for the specified ID */
- #TRMS_DISKINSERTED =8 ; A disk has been inserted into a drive
- #TRMS_DISKREMOVED =9 ; A disk has been removed from a drive
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* //////////////////////////////////////////////// Triton error codes // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- #TRER_OK =0 ; No error */
- #TRER_ALLOCMEM =1 ; Not enough memory */
- #TRER_OPENWINDOW =2 ; Can't open window */
- #TRER_WINDOWTOOBIG =3 ; Window would be too big for screen */
- #TRER_DRAWINFO =4 ; Can't get screen's DrawInfo */
- #TRER_OPENFONT =5 ; Can't open font */
- #TRER_CREATEMSGPORT =6 ; Can't create message port */
- #TRER_INSTALLOBJECT =7 ; Can't create an object */
- #TRER_CREATECLASS =8 ; Can't create a class */
- #TRER_NOLOCKPUBSCREEN =9 ; Can't lock public screen */
- #TRER_CREATEMENUS =12; Error while creating the menus */
- #TRER_GT_CREATECONTEXT=14; Can't create gadget context */
- #TRER_MAXERRORNUM =15; PRIVATE! */
-
- ; Object Messages
-
- #TROM_ACTIVATE=23
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ///////////////////////////////////////// Tags for TR_OpenProject() // */
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* Tag bases */
-
- #TRTG_OAT =#TAG_USER+$400 ;/* Object attribute */
- #TRTG_OBJ =#TAG_USER+$100 ;/* Object ID */
- #TRTG_OAT2=#TAG_USER+$80 ;/* PRIVATE! */
- #TRTG_PAT =#TAG_USER ;/* Project attribute */
-
- ;#TRTG_SER(ser)=(ser <<11)
- ;macro TRTG_SER
- ;`1 LSL 11
- ;end macro
-
- ;/* Window/Project */
- #TRWI_Title= #TRTG_PAT+$01 ;/* STRPTR: The window title */
- #TRWI_Flags= #TRTG_PAT+$02 ;/* See below for window flags */
- #TRWI_Underscore= #TRTG_PAT+$03 ;/* char *: The underscore for menu and gadget shortcuts */
- #TRWI_Position= #TRTG_PAT+$04 ;/* Window position, see below */
- #TRWI_CustomScreen= #TRTG_PAT+$05 ;/* struct Screen * */
- #TRWI_PubScreen= #TRTG_PAT+$06 ;/* struct Screen *, must have been locked! */
- #TRWI_PubScreenName= #TRTG_PAT+$07 ;/* STRPTR, Triton is doing the locking */
- #TRWI_PropFontAttr= #TRTG_PAT+$08 ;/* struct TextAttr *: The proportional font */
- #TRWI_FixedWidthFontAttr=#TRTG_PAT+$09 ;/* struct TextAttr *: The fixed-width font */
- #TRWI_Backfill= #TRTG_PAT+$0A ;/* The backfill type, see below */
- #TRWI_ID= #TRTG_PAT+$0B ;/* ULONG: The window ID */
- #TRWI_Dimensions= #TRTG_PAT+$0C ;/* struct TR_Dimensions * */
- #TRWI_ScreenTitle= #TRTG_PAT+$0D ;/* STRPTR: The screen title */
- #TRWI_QuickHelp= #TRTG_PAT+$0E ; BOO: Quick Help active?
-
- ;/* Menus */
- #TRMN_Title= #TRTG_PAT+$65 ;/* STRPTR: Menu */
- #TRMN_Item= #TRTG_PAT+$66 ;/* STRPTR: Menu item */
- #TRMN_Sub= #TRTG_PAT+$67 ;/* STRPTR: Menu subitem */
- #TRMN_Flags= #TRTG_PAT+$68 ;/* See below for flags */
-
- ;/* General object attributes */
- #TRAT_ID= #TRTG_OAT2+$16 ;/* The object's/menu's ID */
- #TRAT_Flags= #TRTG_OAT2+$17 ;/* The object's flags */
- #TRAT_Value= #TRTG_OAT2+$18 ;/* The object's value */
- #TRAT_Text= #TRTG_OAT2+$19 ;/* The object's text */
- #TRAT_Disabled=#TRTG_OAT2+$1A ;/* Disabled object? */
- #TRAT_Backfill=#TRTG_OAT2+$1B ;/* Backfill pattern */
- #TRAT_MinWidth=#TRTG_OAT2+$1C ;/* Minimum width */
- #TRAT_MinHeight=#TRTG_OAT2+$1D ;/* Minimum height */
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ////////////////////////////////////////////////////// Window flags // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- #TRWF_BACKDROP =$00000001 ; Create a backdrop borderless window */
- #TRWF_NODRAGBAR =$00000002 ; Don't use a dragbar */
- #TRWF_NODEPTHGADGET =$00000004 ; Don't use a depth-gadget */
- #TRWF_NOCLOSEGADGET =$00000008 ; Don't use a close-gadget */
- #TRWF_NOACTIVATE =$00000010 ; Don't activate window */
- #TRWF_NOESCCLOSE =$00000020 ; Don't send TRMS_CLOSEWINDOW when Esc is pressed */
- #TRWF_NOPSCRFALLBACK =$00000040 ; Don't fall back onto default PubScreen */
- #TRWF_NOZIPGADGET =$00000080 ; Don't use a zip-gadget */
- #TRWF_ZIPCENTERTOP =$00000100 ; Center the zipped window on the title bar */
- #TRWF_NOMINTEXTWIDTH =$00000200 ; Minimum window width not according to title text */
- #TRWF_NOSIZEGADGET =$00000400 ; Don't use a sizing-gadget */
- #TRWF_NOFONTFALLBACK =$00000800 ; Don't fall back to topaz.8 */
- #TRWF_NODELZIP =$00001000 ; Don't zip the window when Del is pressed */
- #TRWF_SIMPLEREFRESH =$00002000 ; *** OBSOLETE *** (V3+) */
- #TRWF_ZIPTOCURRENTPOS =$00004000 ; Will zip the window at the current position (OS3.0+) */
- #TRWF_APPWINDOW =$00008000 ; Create an AppWindow without using class_dropbox */
- #TRWF_ACTIVATESTRGAD =$00010000 ; Activate the first string gadget after opening the window */
- #TRWF_HELP =$00020000 ; Pressing <Help> will create a TRMS_HELP message */
- #TRWF_SYSTEMACTION =$00040000 ; System status message will be sent (V4)
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* //////////////////////////////////////////////////////// Menu flags // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- #TRMF_CHECKIT =$00000001 ; Leave space for a checkmark */
- #TRMF_CHECKED =$00000002 ; Check the item (includes TRMF_CHECKIT) */
- #TRMF_DISABLED =$00000004 ; Ghost the menu/item */
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ////////////////////////////////////////////////// Window positions // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- #TRWP_DEFAULT =0 ; Let Triton choose a good position */
- #TRWP_BELOWTITLEBAR =1 ; Left side of screen, below title bar */
- #TRWP_CENTERTOP =1025 ; Top of screen, centered on the title bar */
- #TRWP_TOPLEFTSCREEN =1026 ; Top left corner of screen */
- #TRWP_CENTERSCREEN =1027 ; Centered on the screen */
- #TRWP_CENTERDISPLAY =1028 ; Centered on the currently displayed clip */
- #TRWP_MOUSEPOINTER =1029 ; Under the mouse pointer */
- #TRWP_ABOVECOORDS =2049 ; Above coordinates from the dimensions struct
- #TRWP_BELOWCOORDS =2050 ; Below coordinates from the dimension struct
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* //////////////////////////////////// Backfill types / System images // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- #TRBF_WINDOWBACK =$00000000 ; Window backfill */
- #TRBF_REQUESTERBACK =$00000001 ; Requester backfill */
-
- #TRBF_NONE =$00000002 ; No backfill (= Fill with BACKGROUNDPEN) */
- #TRBF_SHINE =$00000003 ; Fill with SHINEPEN */
- #TRBF_SHINE_SHADOW =$00000004 ; Fill with SHINEPEN + SHADOWPEN */
- #TRBF_SHINE_FILL =$00000005 ; Fill with SHINEPEN + FILLPEN */
- #TRBF_SHINE_BACKGROUND =$00000006 ; Fill with SHINEPEN + BACKGROUNDPEN */
- #TRBF_SHADOW =$00000007 ; Fill with SHADOWPEN */
- #TRBF_SHADOW_FILL =$00000008 ; Fill with SHADOWPEN + FILLPEN */
- #TRBF_SHADOW_BACKGROUND =$00000009 ; Fill with SHADOWPEN + BACKGROUNDPEN */
- #TRBF_FILL =$0000000A ; Fill with FILLPEN */
- #TRBF_FILL_BACKGROUND =$0000000B ; Fill with FILLPEN + BACKGROUNDPEN */
-
- #TRSI_USBUTTONBACK =$00010002 ; Unselected button backfill */
- #TRSI_SBUTTONBACK =$00010003 ; Selected button backfill */
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ////////////////////////////////////////////// Display Object flags // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- ;/* General flags */
- #TROF_RAISED =$00000001 ; Raised object */
- #TROF_HORIZ =$00000002 ; Horizontal object \ Works automatically */
- #TROF_VERT =$00000004 ; Vertical object / in groups */
- #TROF_RIGHTALIGN =$00000008 ; Align object to the right border if available */
-
- ;/* Text flags */
- #TRTX_NOUNDERSCORE =$00000100 ; Don't interpret underscores */
- #TRTX_HIGHLIGHT =$00000200 ; Highlight text */
- #TRTX_3D =$00000400 ; 3D design */
- #TRTX_BOLD =$00000800 ; Softstyle 'bold' */
- #TRTX_TITLE =$00001000 ; A title (e.g. of a group) */
- #TRTX_SELECTED =$00002000 ; PRIVATE! */
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ////////////////////////////////////////////////////// Menu entries // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- #TRMN_BARLABEL=-1 ;/* A barlabel instead of text */
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* /////////////////////////////////////////// Tags for TR_CreateApp() // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- #TRCA_Name =#TAG_USER+1
- #TRCA_LongName =#TAG_USER+2
- #TRCA_Info =#TAG_USER+3
- #TRCA_Version =#TAG_USER+4
- #TRCA_Release =#TAG_USER+5
- #TRCA_Date =#TAG_USER+6
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ///////////////////////////////////////// Tags for TR_EasyRequest() // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- #TREZ_ReqPos =#TAG_USER+1
- #TREZ_LockProject =#TAG_USER+2
- #TREZ_Return =#TAG_USER+3
- #TREZ_Title =#TAG_USER+4
- #TREZ_Activate =#TAG_USER+5
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ///////////////////////////////////////// The Application Structure // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- NEWTYPE .TR_App
- *tra_MemPool.w
- tra_BitMask.l ;/* Bits to Wait() for */
- tra_LastError.l ;/* TRER code of last error */
- tra_Name.l ;/* Unique name */
- tra_LongName.l ;/* User-readable name */
- tra_Info.l ;/* Info string */
- tra_Version.l ;/* Version */
- tra_Release.l ;/* Release */
- tra_Date.l ;/* Compilation date */
- *tra_AppPort.MsgPort
- *tra_IDCMPPort.MsgPort
- *tra_Prefs.w
- *tra_LastProject.TR_Project
- *tra_InputEvent.InputEvent
- End NEWTYPE
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ////////////////////////////////////////// The Dimensions Structure // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- NEWTYPE .TR_Dimensions
- trd_Left.w ;/* Left */
- trd_Top.w ;/* Top */
- trd_Width.w ;/* Width */
- trd_Height.w ;/* Height */
- trd_Left2.w ;/* Left */
- trd_Top2.w ;/* Top */
- trd_Width2.w ;/* Width */
- trd_Height2.w ;/* Height */
- trd_Zoomed.w ;/* Window zoomed? */
- reserved.w[3] ;/* For future expansions */
- End NEWTYPE
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ///////////////////////////////////////////// The Project Structure // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-
- NEWTYPE .TR_Project ;;;;;;;; PRIVATE!!!! ;;;;;;;;
- *trp_App.TR_App
- *trp_Screen.Screen
- trp_ScreenType.l ; Type of screen (WA_...Screen)
- trp_ID.l ;Project's ID
- *trp_LockedPubScreen.Screen
- trp_ScreenTitle.l ; The screen title */
- *trp_Window.Window
- *trp_AppWindow.AppWindow
- trp_IDCMPFlags.l ; The IDCMP flags */
- trp_Flags.l ; Triton window flags */
- *trp_NewMenu.NewMenu
- trp_NewMenuSize.l ; The number of menu items in the list */
- *trp_Menu.Menu
- trp_NextSelect.w ; The next selected menu item */
- *trp_VisualInfo.w
- *trp_DrawInfo.DrawInfo
- *trp_UserDimensions.TR_Dimensions
- *trp_Dimensions.TR_Dimensions
- trp_WindowStdHeight.l ; The standard height of the window */
- trp_LeftBorder.l ; The width of the left window border */
- trp_RightBorder.l ; The width of the right window border */
- trp_TopBorder.l ; The height of the top window border */
- trp_BottomBorder.l ; The height of the bottom window border */
- trp_InnerWidth.l ; The inner width of the window */
- trp_InnerHeight.l ; The inner height of the window */
- trp_ZipDimensions.w[4] ; The dimensions for the zipped window */
- trp_AspectFixing.w ; Pixel aspect correction factor */
- trp_ObjectList.MinList ; The list of display objects */
- trp_MenuList.MinList ; The list of menus */
- trp_IDList.MinList ; The ID linking list (menus & objects) */
- *trp_MemPool.w
- trp_HasObjects.w ; Do we have display objects ? */
- *trp_PropAttr.TextAttr
- *trp_FixedWidthAttr.TextAttr
- *trp_PropFont.TextFont
- *trp_FixedWidthFont.TextFont
- trp_OpenedPropFont.w ; \ Have we opened the fonts ? */
- trp_OpenedFixedWidthFont.w; / */
- trp_TotalPropFontHeight.w ; Height of prop font incl. underscore */
- trp_BackfillType.l ; The backfill type */
- *trp_BackfillHook.Hook
- *trp_GadToolsGadgetList.Gadget
- *trp_PrevGadget.Gadget
- *trp_NewGadget.NewGadget
- *trp_InvisibleRequest.Requester
- trp_IsUserLocked.w ; Project locked by the user? */
- trp_CurrentID.l ; The currently keyboard-selected ID */
- trp_IsCancelDown.w ; Cancellation key pressed? */
- trp_IsShortcutDown.w ; Shortcut key pressed? */
- trp_Underscore.b ; The underscore character */
- trp_EscClose.w ; Close window on Esc ? */
- trp_DelZip.w ; Zip window on Del ? */
- trp_PubScreenFallBack.w ; Fall back onto default public screen ? */
- trp_FontFallBack.w ; Fall back to topaz.8 ? */
- trp_OldWidth.w ; Old window width */
- trp_OldHeight.w ; Old window height */
-
- *trp_QuickHelpWindow.Window
- ; *trp_QuickHelpObject.#TROD_DisplayObject
- trp_TicksPassed.l
- End NEWTYPE
-
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* ///////////////////////////// Default classes, attributes and flags // */
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;** The following code has been assembled automatically from the class
- ; sources and may therefore look somehow unstructured and chaotic ;) **
-
- ;/* class_DisplayObject */
- #TROB_DisplayObject =#TRTG_OBJ+$3C ;/* A basic display object */
-
- #TRDO_QuickHelpString=#TRTG_OAT+$1E3
-
- ;/* class_Group */
- #TRGR_Horiz=#TAG_USER+201 ;/* Horizontal group */
- #TRGR_Vert= #TAG_USER+202 ;/* Vertical group */
- #TRGR_End= #TRTG_OAT2+$4B ;/* End of a group */
-
- #TRGR_PROPSHARE =$00000000 ;/* Default: Divide objects proportionally */
- #TRGR_EQUALSHARE=$00000001 ;/* Divide objects equally */
- #TRGR_PROPSPACES=$00000002 ;/* Divide spaces proportionally */
- #TRGR_ARRAY =$00000004 ;/* Top-level array group */
-
- #TRGR_ALIGN =$00000008 ;/* Align resizeable objects in secondary dimension */
- #TRGR_CENTER =$00000010 ;/* Center unresizeable objects in secondary dimension */
-
- #TRGR_FIXHORIZ =$00000020 ;/* Don't allow horizontal resizing */
- #TRGR_FIXVERT =$00000040 ;/* Don't allow vertical resizing */
- #TRGR_INDEP =$00000080 ;/* Group is independant of surrounding array */
-
- ;/* class_Space */
- #TROB_Space =#TRTG_OBJ+$285 ;/* The spaces class */
- #TRST_NONE =1 ;/* No space */
- #TRST_SMALL =2 ;/* Small space */
- #TRST_NORMAL=3 ;/* Normal space (default) */
- #TRST_BIG =4 ;/* Big space */
-
- ;/* class_CheckBox */
- #TROB_CheckBox=#TRTG_OBJ+$2F ; /* A checkbox gadget */
-
- ;/* class_Object */
- #TROB_Object=#TRTG_OBJ+$3D ;/* A rootclass object */
-
- ;/* class_Cycle */
- #TROB_Cycle =#TRTG_OBJ+$36 ;/* A cycle gadget */
-
- #TRCY_MX =$00010000 ;/* Unfold the cycle gadget to a MX gadget */
- #TRCY_RIGHTLABELS=$00020000 ;/* Put the labels to the right of a MX gadget */
-
- ;/* class_DropBox */
- #TROB_DropBox=#TRTG_OBJ+$38 ;/* An icon drop box */
-
- ;/* class_Scroller */
- #TROB_Scroller=#TRTG_OBJ+$35 ;/* A scroller gadget */
-
- #TRSC_Total=#TRTG_OAT+$1E0
- #TRSC_Visible=#TRTG_OAT+$1E1
-
- ;/* class_FrameBox */
- #TROB_FrameBox=#TRTG_OBJ+$32 ;/* A framing box */
-
- #TRFB_GROUPING=$00000001 ;/* A grouping box */
- #TRFB_FRAMING=$00000002 ;/* A framing box */
- #TRFB_TEXT=$00000004 ;/* A text container */
-
- ;/* class_Button */
- #TROB_Button =#TRTG_OBJ+$31 ;/* A BOOPSI button gadget */
-
- #TRBU_RETURNOK =$00010000 ;/* <Return> answers the button */
- #TRBU_ESCOK =$00020000 ;/* <Esc> answers the button */
- #TRBU_SHIFTED =$00040000 ;/* Shifted shortcut only */
- #TRBU_UNSHIFTED =$00080000 ;/* Unshifted shortcut only */
- #TRBU_YRESIZE =$00100000 ;/* Button resizeable in Y direction */
- #TRBT_TEXT =0 ;/* Text button */
- #TRBT_GETFILE =1 ;/* GetFile button */
- #TRBT_GETDRAWER =2 ;/* GetDrawer button */
- #TRBT_GETENTRY =3 ;/* GetEntry button */
-
- ;/* class_Line */
- #TROB_Line=#TRTG_OBJ+$2D ;/* A simple line */
-
- ;/* class_Palette */
- #TROB_Palette=#TRTG_OBJ+$33 ;/* A palette gadget */
-
- ;/* class_Slider */
- #TROB_Slider=#TRTG_OBJ+$34 ;/* A slider gadget */
-
- #TRSL_Min=#TRTG_OAT+$1DE
- #TRSL_Max=#TRTG_OAT+$1DF
-
- ;/* class_Progress */
- #TROB_Progress=#TRTG_OBJ+$3A ;/* A progress indicator */
-
- ;/* class_Text */
- #TROB_Text=#TRTG_OBJ+$30 ;/* A line of text */
-
- #TRTX_CLIPPED=$00010000
-
- ;/* class_Listview */
- #TROB_Listview=#TRTG_OBJ+$39 ;/* A listview gadget */
-
- #TRLV_Top =#TRTG_OAT+$1E2
-
- #TRLV_READONLY =$10000 ;/* A read-only list */
- #TRLV_SELECT =$20000 ;/* You may select an entry */
- #TRLV_SHOWSELECTED =$40000 ;/* Selected entry will be shown */
- #TRLV_NOCURSORKEYS =$80000 ;/* Don't use arrow keys */
- #TRLV_NONUMPADKEYS =$100000 ;/* Don't use numeric keypad keys */
- #TRLV_FWFONT =$200000 ;/* Use the fixed-width font */
- #TRLV_NOGAP =$400000 ;/* Don't leave a gap below the list */
-
- ;/* class_String */
- #TROB_String=#TRTG_OBJ+$37 ;/* A string gadget */
-
- #TRST_INVISIBLE =$00010000
- #TRST_NORETURNBROADCAST=$00020000
-
- ;/* class_Image */
- #TROB_Image =#TRTG_OBJ+$3B ;/* An image */
- #TRIM_BOOPSI=$00010000 ;/* Use a BOOPSI IClass image */
-
- ;/* End of automatically assembled code */ ; NOT FOR BLITZ IT AIN'T !
-
- ;/* ////////////////////////////////////////////////////////////////////// */
- ;/* /////////////////////////////////////////////////////////// The End // */
- ;/* ////////////////////////////////////////////////////////////////////// */
-